function [Hn Hu Hd] = ClassifyLimit(rIndex, rStock, delta)

    [n m] = size(rStock);
    Hn = [];    Hu = [];    Hd = [];
    %Daten = []; Dateu = []; Dated = [];
    for i = 1:n
        if (delta < rStock(i))
            Hu = [Hu; rIndex(i) rStock(i)];
            %Dateu = [Dateu; Date(i, :)];
        elseif (-delta > rStock(i))
            Hd = [Hd; rIndex(i) rStock(i)];
            %Dated = [Dated; Date(i, :)];
        else
            Hn = [Hn; rIndex(i) rStock(i)];
           %Daten = [Daten; Date(i, :)];
        end
    end
end